home *** CD-ROM | disk | FTP | other *** search
/ Developer Helper 1: Phil & Dave's Excellent CD / Excellent CD HFS.raw / HyperCard / HyperCard 1.2.2 International / HyperCard Danish (DK-1.2.2) / Idestakke / Knapideer / card_6144.txt < prev    next >
Text File  |  1988-12-19  |  9KB  |  458 lines
  1. -- card: 6144 from stack: in
  2. -- bmap block id: 7504
  3. -- flags: 0000
  4. -- background id: 2106
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: 0000
  11. -- rect: left=38 top=107 right=145 bottom=82
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 1011 / 1011
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Hjem
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   visual effect iris close
  23.   go home
  24. end mouseUp
  25.  
  26.  
  27.  
  28.  
  29. -- part 2 (button)
  30. -- low flags: 00
  31. -- high flags: 0000
  32. -- rect: left=42 top=208 right=245 bottom=80
  33. -- title width / last selected line: 0
  34. -- icon id / first selected line: 21700 / 21700
  35. -- text alignment: 1
  36. -- font id: 0
  37. -- text size: 12
  38. -- style flags: 0
  39. -- line height: 16
  40. -- part name: Hjem
  41. ----- HyperTalk script -----
  42. on mouseUp
  43.   visual effect iris close
  44.   go home
  45. end mouseUp
  46.  
  47.  
  48.  
  49. -- part 3 (button)
  50. -- low flags: 00
  51. -- high flags: 0000
  52. -- rect: left=96 top=158 right=193 bottom=135
  53. -- title width / last selected line: 0
  54. -- icon id / first selected line: 21847 / 21847
  55. -- text alignment: 1
  56. -- font id: 0
  57. -- text size: 12
  58. -- style flags: 0
  59. -- line height: 16
  60. -- part name: Hjem
  61. ----- HyperTalk script -----
  62. on mouseUp
  63.   visual effect iris close
  64.   go home
  65. end mouseUp
  66.  
  67.  
  68.  
  69.  
  70. -- part 4 (button)
  71. -- low flags: 00
  72. -- high flags: 0000
  73. -- rect: left=41 top=158 right=193 bottom=82
  74. -- title width / last selected line: 0
  75. -- icon id / first selected line: 20689 / 20689
  76. -- text alignment: 1
  77. -- font id: 0
  78. -- text size: 12
  79. -- style flags: 0
  80. -- line height: 16
  81. -- part name: Hjem
  82. ----- HyperTalk script -----
  83. on mouseUp
  84.   visual effect iris close
  85.   go home
  86. end mouseUp
  87.  
  88.  
  89.  
  90. -- part 5 (button)
  91. -- low flags: 00
  92. -- high flags: 0000
  93. -- rect: left=93 top=107 right=145 bottom=137
  94. -- title width / last selected line: 0
  95. -- icon id / first selected line: 11045 / 11045
  96. -- text alignment: 1
  97. -- font id: 0
  98. -- text size: 12
  99. -- style flags: 0
  100. -- line height: 16
  101. -- part name: Hjem
  102. ----- HyperTalk script -----
  103. on mouseUp
  104.   visual effect iris close
  105.   go home
  106. end mouseUp
  107.  
  108.  
  109.  
  110. -- part 7 (button)
  111. -- low flags: 00
  112. -- high flags: 0000
  113. -- rect: left=223 top=111 right=142 bottom=266
  114. -- title width / last selected line: 0
  115. -- icon id / first selected line: 15972 / 15972
  116. -- text alignment: 1
  117. -- font id: 0
  118. -- text size: 12
  119. -- style flags: 0
  120. -- line height: 16
  121. -- part name: Kalender
  122. ----- HyperTalk script -----
  123. on mouseUp
  124.   go to first card of stack "Kalender"
  125. end mouseUp
  126.  
  127.  
  128.  
  129. -- part 8 (button)
  130. -- low flags: 00
  131. -- high flags: 0000
  132. -- rect: left=349 top=111 right=142 bottom=392
  133. -- title width / last selected line: 0
  134. -- icon id / first selected line: 10610 / 10610
  135. -- text alignment: 1
  136. -- font id: 0
  137. -- text size: 12
  138. -- style flags: 0
  139. -- line height: 16
  140. -- part name: Ring
  141. ----- HyperTalk script -----
  142. on mouseUp
  143.   get the selection
  144.   if it is empty then ask "Ring til hvilket nummer?"
  145.   if it is not empty then
  146.     dial it
  147.   end if
  148. end mouseUp
  149.  
  150.  
  151.  
  152. -- part 9 (button)
  153. -- low flags: 00
  154. -- high flags: 0000
  155. -- rect: left=224 top=155 right=186 bottom=267
  156. -- title width / last selected line: 0
  157. -- icon id / first selected line: 3430 / 3430
  158. -- text alignment: 1
  159. -- font id: 0
  160. -- text size: 12
  161. -- style flags: 0
  162. -- line height: 16
  163. -- part name: Adresse
  164. ----- HyperTalk script -----
  165. on mouseUp
  166.   get the selection
  167.   visual effect zoom open
  168.   go to "Adresse"
  169.   if it is not empty then find it
  170. end mouseUp
  171.  
  172.  
  173.  
  174. -- part 12 (button)
  175. -- low flags: 00
  176. -- high flags: 0000
  177. -- rect: left=411 top=153 right=187 bottom=450
  178. -- title width / last selected line: 0
  179. -- icon id / first selected line: 0 / 0
  180. -- text alignment: 1
  181. -- font id: 0
  182. -- text size: 12
  183. -- style flags: 0
  184. -- line height: 16
  185. -- part name: Opgaver
  186. ----- HyperTalk script -----
  187. on mouseUp
  188.   go to card "Opgaver1" of stack "Kalender"
  189. end mouseUp
  190.  
  191.  
  192.  
  193. -- part 13 (button)
  194. -- low flags: 00
  195. -- high flags: 0000
  196. -- rect: left=289 top=154 right=189 bottom=328
  197. -- title width / last selected line: 0
  198. -- icon id / first selected line: 17481 / 17481
  199. -- text alignment: 1
  200. -- font id: 0
  201. -- text size: 12
  202. -- style flags: 0
  203. -- line height: 16
  204. -- part name: Adresse
  205. ----- HyperTalk script -----
  206. on mouseUp
  207.   get the selection
  208.   visual effect zoom open
  209.   go to "Adresse"
  210.   if it is not empty then find it
  211. end mouseUp
  212.  
  213.  
  214.  
  215. -- part 14 (button)
  216. -- low flags: 00
  217. -- high flags: 0000
  218. -- rect: left=350 top=198 right=233 bottom=389
  219. -- title width / last selected line: 0
  220. -- icon id / first selected line: 21209 / 21209
  221. -- text alignment: 1
  222. -- font id: 0
  223. -- text size: 12
  224. -- style flags: 0
  225. -- line height: 16
  226. -- part name: Dagskalender
  227. ----- HyperTalk script -----
  228. on mouseUp
  229.   set lockScreen to true
  230.   go to stack "Kalender"
  231.   goWeekly the seconds
  232. end mouseUp
  233.  
  234.  
  235.  
  236.  
  237. -- part 15 (button)
  238. -- low flags: 00
  239. -- high flags: 0000
  240. -- rect: left=225 top=198 right=233 bottom=265
  241. -- title width / last selected line: 0
  242. -- icon id / first selected line: 22855 / 22855
  243. -- text alignment: 1
  244. -- font id: 0
  245. -- text size: 12
  246. -- style flags: 0
  247. -- line height: 16
  248. -- part name: Årskalender
  249. ----- HyperTalk script -----
  250. on mouseUp
  251.   set lockscreen to true
  252.   go to "Kalender"
  253.   goSixMonthly the seconds
  254. end mouseUp
  255.  
  256.  
  257.  
  258. -- part 16 (button)
  259. -- low flags: 00
  260. -- high flags: 0000
  261. -- rect: left=289 top=109 right=144 bottom=328
  262. -- title width / last selected line: 0
  263. -- icon id / first selected line: 1017 / 1017
  264. -- text alignment: 1
  265. -- font id: 0
  266. -- text size: 12
  267. -- style flags: 0
  268. -- line height: 16
  269. -- part name: 
  270. ----- HyperTalk script -----
  271. on mouseUp
  272.   get the selection
  273.   if it is empty then ask "Ring til hvilket nummer?"
  274.   if it is not empty then
  275.     dial it
  276.   end if
  277. end mouseUp
  278.  
  279.  
  280.  
  281. -- part 17 (button)
  282. -- low flags: 00
  283. -- high flags: 0000
  284. -- rect: left=411 top=198 right=233 bottom=450
  285. -- title width / last selected line: 0
  286. -- icon id / first selected line: 8961 / 8961
  287. -- text alignment: 1
  288. -- font id: 0
  289. -- text size: 12
  290. -- style flags: 0
  291. -- line height: 16
  292. -- part name: 
  293.  
  294.  
  295. -- part 18 (button)
  296. -- low flags: 00
  297. -- high flags: 0000
  298. -- rect: left=226 top=247 right=282 bottom=265
  299. -- title width / last selected line: 0
  300. -- icon id / first selected line: 20965 / 20965
  301. -- text alignment: 1
  302. -- font id: 0
  303. -- text size: 12
  304. -- style flags: 0
  305. -- line height: 16
  306. -- part name: Opgaver
  307. ----- HyperTalk script -----
  308. on mouseUp
  309.   go to card "Opgaver1" of "Kalender"
  310. end mouseUp
  311.  
  312.  
  313.  
  314. -- part 19 (button)
  315. -- low flags: 00
  316. -- high flags: 0000
  317. -- rect: left=97 top=207 right=245 bottom=138
  318. -- title width / last selected line: 0
  319. -- icon id / first selected line: 20098 / 20098
  320. -- text alignment: 1
  321. -- font id: 0
  322. -- text size: 12
  323. -- style flags: 0
  324. -- line height: 16
  325. -- part name: Hjem
  326. ----- HyperTalk script -----
  327. on mouseUp
  328.   visual effect iris close
  329.   go home
  330. end mouseUp
  331.  
  332.  
  333.  
  334. -- part 20 (button)
  335. -- low flags: 00
  336. -- high flags: 0000
  337. -- rect: left=288 top=247 right=282 bottom=327
  338. -- title width / last selected line: 0
  339. -- icon id / first selected line: 17357 / 17357
  340. -- text alignment: 1
  341. -- font id: 0
  342. -- text size: 12
  343. -- style flags: 0
  344. -- line height: 16
  345. -- part name: 
  346.  
  347.  
  348. -- part 22 (button)
  349. -- low flags: 00
  350. -- high flags: 0000
  351. -- rect: left=411 top=110 right=143 bottom=452
  352. -- title width / last selected line: 0
  353. -- icon id / first selected line: 30696 / 30696
  354. -- text alignment: 1
  355. -- font id: 0
  356. -- text size: 12
  357. -- style flags: 0
  358. -- line height: 16
  359. -- part name: Ring
  360. ----- HyperTalk script -----
  361. on mouseUp
  362.   get the selection
  363.   if it is empty then ask "Ring til hvilket nummer?"
  364.   if it is not empty then
  365.     dial it
  366.   end if
  367. end mouseUp
  368.  
  369.  
  370.  
  371. -- part 23 (button)
  372. -- low flags: 00
  373. -- high flags: 0000
  374. -- rect: left=288 top=198 right=233 bottom=327
  375. -- title width / last selected line: 0
  376. -- icon id / first selected line: 4263 / 4263
  377. -- text alignment: 1
  378. -- font id: 0
  379. -- text size: 12
  380. -- style flags: 0
  381. -- line height: 16
  382. -- part name: 
  383.  
  384.  
  385. -- part 24 (button)
  386. -- low flags: 00
  387. -- high flags: 8000
  388. -- rect: left=350 top=247 right=298 bottom=389
  389. -- title width / last selected line: 0
  390. -- icon id / first selected line: 32670 / 32670
  391. -- text alignment: 1
  392. -- font id: 0
  393. -- text size: 12
  394. -- style flags: 0
  395. -- line height: 16
  396. -- part name: Vis
  397. ----- HyperTalk script -----
  398. on mouseUp
  399.   show all cards
  400. end mouseUp
  401.  
  402.  
  403.  
  404. -- part 25 (button)
  405. -- low flags: 00
  406. -- high flags: 8000
  407. -- rect: left=412 top=246 right=298 bottom=453
  408. -- title width / last selected line: 0
  409. -- icon id / first selected line: 20186 / 20186
  410. -- text alignment: 1
  411. -- font id: 0
  412. -- text size: 12
  413. -- style flags: 0
  414. -- line height: 16
  415. -- part name: Sortér
  416. ----- HyperTalk script -----
  417. on mouseUp
  418.   -- Fjern de n√¶ste fire linier f√∏r knappen bruges i en anden stak
  419.   if the name of this stack contains "Knapideer" then
  420.     answer "Sorter ikke kortene i denne stak!" with OK
  421.     exit mouseup
  422.   end if
  423.  
  424.  
  425.   answer "Sort√©r alle kortene i denne stak efter:" with "Fornavn" or "Efternavn" or "Annuller"
  426.   if it is "Fornavn"
  427.   then sort by first word of first line of field 1
  428. else if it is "Efternavn"
  429. then sort by last word of first line of field 1
  430. end mouseUp
  431.  
  432.  
  433.  
  434. -- part 26 (button)
  435. -- low flags: 00
  436. -- high flags: 0000
  437. -- rect: left=351 top=156 right=187 bottom=391
  438. -- title width / last selected line: 0
  439. -- icon id / first selected line: 11645 / 11645
  440. -- text alignment: 1
  441. -- font id: 0
  442. -- text size: 12
  443. -- style flags: 0
  444. -- line height: 16
  445. -- part name: Se
  446. ----- HyperTalk script -----
  447. on mouseUp
  448.   get the selection
  449.   visual effect zoom open
  450.   go to "Adresse"
  451.   if it is not empty then find it
  452. end mouseUp
  453.  
  454.  
  455.  
  456. -- part contents for background part 1
  457. ----- text -----
  458. Hjem, Erhverv